home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / win / pascal / mbutils.exe / TESTMB.PAS < prev   
Pascal/Delphi Source File  |  1991-06-30  |  301b  |  15 lines
  1. Program TestMB;
  2.  
  3.  
  4. Uses MBUtils, WinTypes;
  5.  
  6.  
  7. Begin
  8.   MBClear;
  9.   MBWriteBuf('Hello there everyone!');
  10.   MBWriteLn;
  11.   MBWriteStr(#10 + 'This is a small "Hello World"' + #10 +
  12.              'program for Windows.');
  13.  
  14.   MBShowWindow(0, 'Hello World!', mb_Ok + mb_IconExclamation);
  15. End. {TestMB}